Const vbBSNone=0
Const vbFixedSingle=1
Const vbSizable=2
Const vbFixedDialog=3
Const vbFixedDouble=3
Const vbFixedToolWindow=4
Const vbSizableToolWindow=5
Const vbTransparent=0
Const vbBSSolid=1
Const vbBSDash=2
Const vbBSDot=3
Const vbBSDashDot=4
Const vbBSDashDotDot=5
Const vbBSInsideSolid=6
Const vbUser=0
Const vbTwips=1
Const vbPoints=2
Const vbPixels=3
Const vbCharacters=4
Const vbInches=5
Const vbMillimeters=6
Const vbCentimeters=7
Const vbHiMetric=8
Const vbContainerPosition=9
Const vbContainerSize=10
Const vbNormal=0
Const vbMinimized=1
Const vbMaximized=2
Const vbReadOnly=1
Const vbHidden=2
Const vbSystem=4
Const vbVolume=8
Const vbDirectory=16
Const vbArchive=32
Const vbSolid=0
Const vbDash=1
Const vbDot=2
Const vbDashDot=3
Const vbDashDotDot=4
Const vbInvisible=5
Const vbInsideSolid=6
Const vbBlackness=1
Const vbNotMergePen=2
Const vbMaskNotPen=3
Const vbNotCopyPen=4
Const vbMaskPenNot=5
Const vbInvert=6
Const vbXorPen=7
Const vbNotMaskPen=8
Const vbMaskPen=9
Const vbNotXorPen=10
Const vbNop=11
Const vbMergeNotPen=12
Const vbCopyPen=13
Const vbMergePenNot=14
Const vbMergePen=15
Const vbWhiteness=16
Const vbFSSolid=0
Const vbFSTransparent=1
Const vbHorizontalLine=2
Const vbVerticalLine=3
Const vbUpwardDiagonal=4
Const vbDownwardDiagonal=5
Const vbCross=6
Const vbDiagonalCross=7
Const vbButtonStandard=0
Const vbButtonGraphical=1
Const vbLeftJustify=0
Const vbRightJustify=1
Const vbCenter=2
Const vbListBoxStandard=0
Const vbListBoxCheckbox=1
Const vbModal=1
Const vbModeless=0
Const vbFormControlMenu=0
Const vbFormCode=1
Const vbAppWindows=2
Const vbAppTaskManager=3
Const vbFormMDIForm=4
Const vbBringToFront=0
Const vbSendToBack=1
Const vbScrollBars=&H80000000
Const vbDesktop=&H80000001
Const vbActiveTitleBar=&H80000002
Const vbInactiveTitleBar=&H80000003
Const vbMenuBar=&H80000004
Const vbWindowBackground=&H80000005
Const vbWindowFrame=&H80000006
Const vbMenuText=&H80000007
Const vbWindowText=&H80000008
Const vbTitleBarText=&H80000009
Const vbActiveBorder=&H8000000A
Const vbInactiveBorder=&H8000000B
Const vbApplicationWorkspace=&H8000000C
Const vbHighlight=&H8000000D
Const vbHighlightText=&H8000000E
Const vbButtonFace=&H8000000F
Const vbButtonShadow=&H80000010
Const vbGrayText=&H80000011
Const vbButtonText=&H80000012
Const vbInactiveCaptionText=&H80000013
Const vb3DHighlight=&H80000014
Const vb3DDKShadow=&H80000015
Const vb3DLight=&H80000016
Const vb3DFace=&H8000000F
Const vb3Dshadow=&H80000010
Const vbInfoText=&H80000017
Const vbInfoBackground=&H80000018
Const vbVEmpty=0
Const vbVNull=1
Const vbVInteger=2
Const vbVLong=3
Const vbVSingle=4
Const vbVDouble=5
Const vbVCurrency=6
Const vbVDate=7
Const vbVString=8
Const vbKeyLButton=&H1
Const vbKeyRButton=&H2
Const vbKeyCancel=&H3
Const vbKeyMButton=&H4
Const vbKeyBack=&H8
Const vbKeyTab=&H9
Const vbKeyClear=&HC
Const vbKeyReturn=&HD
Const vbKeyShift=&H10
Const vbKeyControl=&H11
Const vbKeyMenu=&H12
Const vbKeyPause=&H13
Const vbKeyCapital=&H14
Const vbKeyEscape=&H1B
Const vbKeySpace=&H20
Const vbKeyPageUp=&H21
Const vbKeyPageDown=&H22
Const vbKeyEnd=&H23
Const vbKeyHome=&H24
Const vbKeyLeft=&H25
Const vbKeyUp=&H26
Const vbKeyRight=&H27
Const vbKeyDown=&H28
Const vbKeySelect=&H29
Const vbKeyPrint=&H2A
Const vbKeyExecute=&H2B
Const vbKeySnapshot=&H2C
Const vbKeyInsert=&H2D
Const vbKeyDelete=&H2E
Const vbKeyHelp=&H2F
Const vbKeyNumlock=&H90
Const vbKeyA=65
Const vbKeyB=66
Const vbKeyC=67
Const vbKeyD=68
Const vbKeyE=69
Const vbKeyF=70
Const vbKeyG=71
Const vbKeyH=72
Const vbKeyI=73
Const vbKeyJ=74
Const vbKeyK=75
Const vbKeyL=76
Const vbKeyM=77
Const vbKeyN=78
Const vbKeyO=79
Const vbKeyP=80
Const vbKeyQ=81
Const vbKeyR=82
Const vbKeyS=83
Const vbKeyT=84
Const vbKeyU=85
Const vbKeyV=86
Const vbKeyW=87
Const vbKeyX=88
Const vbKeyY=89
Const vbKeyZ=90
Const vbKey0=48
Const vbKey1=49
Const vbKey2=50
Const vbKey3=51
Const vbKey4=52
Const vbKey5=53
Const vbKey6=54
Const vbKey7=55
Const vbKey8=56
Const vbKey9=57
Const vbKeyNumpad0=&H60
Const vbKeyNumpad1=&H61
Const vbKeyNumpad2=&H62
Const vbKeyNumpad3=&H63
Const vbKeyNumpad4=&H64
Const vbKeyNumpad5=&H65
Const vbKeyNumpad6=&H66
Const vbKeyNumpad7=&H67
Const vbKeyNumpad8=&H68
Const vbKeyNumpad9=&H69
Const vbKeyMultiply=&H6A
Const vbKeyAdd=&H6B
Const vbKeySeparator=&H6C
Const vbKeySubtract=&H6D
Const vbKeyDecimal=&H6E
Const vbKeyDivide=&H6F
Const vbKeyF1=&H70
Const vbKeyF2=&H71
Const vbKeyF3=&H72
Const vbKeyF4=&H73
Const vbKeyF5=&H74
Const vbKeyF6=&H75
Const vbKeyF7=&H76
Const vbKeyF8=&H77
Const vbKeyF9=&H78
Const vbKeyF10=&H79
Const vbKeyF11=&H7A
Const vbKeyF12=&H7B
Const vbKeyF13=&H7C
Const vbKeyF14=&H7D
Const vbKeyF15=&H7E
Const vbKeyF16=&H7F
Const vbMenuAccelCtrlA=1 
Const vbMenuAccelCtrlB=2 
Const vbMenuAccelCtrlC=3 
Const vbMenuAccelCtrlD=4 
Const vbMenuAccelCtrlE=5 
Const vbMenuAccelCtrlF=6 
Const vbMenuAccelCtrlG=7 
Const vbMenuAccelCtrlH=8 
Const vbMenuAccelCtrlI=9 
Const vbMenuAccelCtrlJ=10
Const vbMenuAccelCtrlK=11
Const vbMenuAccelCtrlL=12
Const vbMenuAccelCtrlM=13
Const vbMenuAccelCtrlN=14
Const vbMenuAccelCtrlO=15
Const vbMenuAccelCtrlP=16
Const vbMenuAccelCtrlQ=17
Const vbMenuAccelCtrlR=18
Const vbMenuAccelCtrlS=19
Const vbMenuAccelCtrlT=20
Const vbMenuAccelCtrlU=21
Const vbMenuAccelCtrlV=22
Const vbMenuAccelCtrlW=23
Const vbMenuAccelCtrlX=24
Const vbMenuAccelCtrlY=25
Const vbMenuAccelCtrlZ=26
Const vbMenuAccelF1=27
Const vbMenuAccelF2=28
Const vbMenuAccelF3=29
Const vbMenuAccelF4=30
Const vbMenuAccelF5=31
Const vbMenuAccelF6=32
Const vbMenuAccelF7=33
Const vbMenuAccelF8=34
Const vbMenuAccelF9=35
Const vbMenuAccelF11=36
Const vbMenuAccelF12=37
Const vbMenuAccelCtrlF1=38
Const vbMenuAccelCtrlF2=39
Const vbMenuAccelCtrlF3=40
Const vbMenuAccelCtrlF4=41
Const vbMenuAccelCtrlF5=42
Const vbMenuAccelCtrlF6=43
Const vbMenuAccelCtrlF7=44
Const vbMenuAccelCtrlF8=45
Const vbMenuAccelCtrlF9=46
Const vbMenuAccelCtrlF11=47
Const vbMenuAccelCtrlF12=48
Const vbMenuAccelShiftF1=49
Const vbMenuAccelShiftF2=50
Const vbMenuAccelShiftF3=51
Const vbMenuAccelShiftF4=52
Const vbMenuAccelShiftF5=53
Const vbMenuAccelShiftF6=54
Const vbMenuAccelShiftF7=55
Const vbMenuAccelShiftF8=56
Const vbMenuAccelShiftF9=57
Const vbMenuAccelShiftF11=58
Const vbMenuAccelShiftF12=59
Const vbMenuAccelShiftCtrlF1=60
Const vbMenuAccelShiftCtrlF2=61
Const vbMenuAccelShiftCtrlF3=62
Const vbMenuAccelShiftCtrlF4=63
Const vbMenuAccelShiftCtrlF5=64
Const vbMenuAccelShiftCtrlF6=65
Const vbMenuAccelShiftCtrlF7=66
Const vbMenuAccelShiftCtrlF8=67
Const vbMenuAccelShiftCtrlF9=68
Const vbMenuAccelShiftCtrlF11=69
Const vbMenuAccelShiftCtrlF12=70
Const vbMenuAccelCtrlIns=71
Const vbMenuAccelShiftIns=72
Const vbMenuAccelDel=73
Const vbMenuAccelShiftDel=74
Const vbMenuAccelAltBksp=75
Const vbLineBox=1
Const vbLineBoxFill=2
Const vbCFRTF=-16639
Const vbCFLink=-16640
Const vbCFText=13
Const vbCFBitmap=2
Const vbCFMetafile=3
Const vbCFDIB=8
Const vbCFPalette=9
Const vbCFEMetaFile=14
Const vbCFFiles=15
Const vbMsgBoxHelpButton=16384
Const vbMsgBoxSetForeground=65536
Const vbMsgBoxRight=524288
Const vbMsgBoxRtlReading=1048576
Const vbShapeRectangle=0
Const vbShapeSquare=1
Const vbShapeOval=2
Const vbShapeCircle=3
Const vbShapeRoundedRectangle=4
Const vbShapeRoundedSquare=5
Const vbFormFullSIPResize=0
Const vbFormFullNoResize=1
Const vbFormUserSize=2
Const vbSIPUser=0
Const vbSIPAutomatic=1
Const vbSIPAlways=2